home *** CD-ROM | disk | FTP | other *** search
/ CD ROM Paradise Collection 4 / CD ROM Paradise Collection 4 1995 Nov.iso / comms_w / twswfwg.zip / WINPKT.BAT < prev   
DOS Batch File  |  1994-05-31  |  2KB  |  94 lines

  1. @ECHO OFF
  2. rem WINPKT.BAT
  3. rem
  4. rem USAGE:
  5. rem Automatically invoked by accompanying
  6. rem OEMSETUP.INF as a CALL from AUTOEXEC.BAT
  7. rem following the NET START command, i.e.
  8. rem after DIS_PKT.DOS has loaded. This allows
  9. rem automatic detection of PKTDRV interrupt
  10. rem vector by WINPKT, and, thus, allows
  11. rem setting this vector via the standard
  12. rem Windows for Workgroups 3.1x dialogue boxes
  13. rem (Network Setup [Drivers...] [Setup...]).
  14. rem
  15. rem DESCRIPTION:
  16. rem This batch file tries to load WINPKT with
  17. rem successive PKTDRV interrupt vector values
  18. rem until WINPKT returns with ERRORLEVEL 0
  19. rem indicating that it found a loaded PKTDRV.
  20. rem Only values available in the accompanying
  21. rem OEMSETUP.INF (0x60,0x63,0x65,0x66,0x78,0x79,
  22. rem 0x7B,0x7C,0x7D,0x7E,and 0x7F) are tested.
  23. rem This is a brute force "kludge" and could be
  24. rem accomplished much more graceful from within
  25. rem WINPKT (as it is by PKTMUX).
  26. rem
  27. rem HISTORY:
  28. rem 22 Mar 94 - Original by Douglas W. Jones
  29. rem             (email jones@cbdb1.nimh.nih.gov)
  30. rem
  31. rem
  32. SET pktdrv_vec=0x60
  33. %1winpkt.com %pktdrv_vec% > NUL:
  34. IF ERRORLEVEL 1 GOTO try63
  35. GOTO loaded
  36. :try63
  37. SET pktdrv_vec=0x63
  38. %1winpkt.com %pktdrv_vec% > NUL:
  39. IF ERRORLEVEL 1 GOTO try65
  40. GOTO loaded
  41. :try65
  42. SET pktdrv_vec=0x65
  43. %1winpkt.com %pktdrv_vec% > NUL:
  44. IF ERRORLEVEL 1 GOTO try66
  45. GOTO loaded
  46. :try66
  47. SET pktdrv_vec=0x66
  48. %1winpkt.com %pktdrv_vec% > NUL:
  49. IF ERRORLEVEL 1 GOTO try78
  50. GOTO loaded
  51. :try78
  52. SET pktdrv_vec=0x78
  53. %1winpkt.com %pktdrv_vec% > NUL:
  54. IF ERRORLEVEL 1 GOTO try79
  55. GOTO loaded
  56. :try79
  57. SET pktdrv_vec=0x79
  58. %1winpkt.com %pktdrv_vec% > NUL:
  59. IF ERRORLEVEL 1 GOTO try7B
  60. GOTO loaded
  61. :try7B
  62. SET pktdrv_vec=0x7B
  63. %1winpkt.com %pktdrv_vec% > NUL:
  64. IF ERRORLEVEL 1 GOTO try7C
  65. GOTO loaded
  66. :try7C
  67. SET pktdrv_vec=0x7C
  68. %1winpkt.com %pktdrv_vec% > NUL:
  69. IF ERRORLEVEL 1 GOTO try7D
  70. GOTO loaded
  71. :try7D
  72. SET pktdrv_vec=0x7D
  73. %1winpkt.com %pktdrv_vec% > NUL:
  74. IF ERRORLEVEL 1 GOTO try7E
  75. GOTO loaded
  76. :try7E
  77. SET pktdrv_vec=0x7E
  78. %1winpkt.com %pktdrv_vec% > NUL:
  79. IF ERRORLEVEL 1 GOTO try7F
  80. GOTO loaded
  81. :try7F
  82. SET pktdrv_vec=0x7F
  83. %1winpkt.com %pktdrv_vec% > NUL:
  84. IF ERRORLEVEL 1 GOTO notloaded
  85. GOTO loaded
  86. :notloaded
  87. ECHO ERROR: WINPKT not loaded; PKTDRV not found
  88. GOTO exit
  89. :loaded
  90. ECHO WINPKT loaded; PKTDRV using interrupt %pktdrv_vec%
  91. :exit
  92. SET pktdrv_vec=
  93.  
  94.